home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2005 June (DVD) / DPPRO0605DVD.iso / Install / program files / Borland / BDS / 3.0 / Demos / Delphi.Net / CLR / ServerControlValues / Global.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2004-10-22  |  2.0 KB  |  89 lines
  1. unit Global;
  2.  
  3. interface
  4.  
  5. uses
  6.   System.Collections, System.ComponentModel,
  7.   System.Web, System.Web.SessionState;
  8.  
  9. type
  10.   TGlobal = class(System.Web.HttpApplication)
  11.   {$REGION 'Designer Managed Code'}
  12.   strict private
  13.     procedure InitializeComponent;
  14.   {$ENDREGION}
  15.   strict protected
  16.     procedure Application_Start(sender: System.Object; e: EventArgs);
  17.     procedure Session_Start(sender: System.Object; e: EventArgs);
  18.     procedure Application_BeginRequest(sender: System.Object; e: EventArgs);
  19.     procedure Application_EndRequest(sender: System.Object; e: EventArgs);
  20.     procedure Application_AuthenticateRequest(sender: System.Object; e: EventArgs);
  21.     procedure Application_Error(sender: System.Object; e: EventArgs);
  22.     procedure Session_End(sender: System.Object; e: EventArgs);
  23.     procedure Application_End(sender: System.Object; e: EventArgs);
  24.   public
  25.     constructor Create;
  26.   end;
  27.  
  28. implementation
  29.  
  30. {$REGION 'Designer Managed Code'}
  31. /// <summary>
  32. /// Required method for Designer support - do not modify
  33. /// the contents of this method with the code editor.
  34. /// </summary>
  35. procedure TGlobal.InitializeComponent;
  36. begin 
  37.         
  38. end;
  39. {$ENDREGION}
  40.  
  41. constructor TGlobal.Create;
  42. begin
  43.   inherited;
  44.   InitializeComponent;
  45. end;
  46.  
  47. procedure TGlobal.Application_Start(sender: System.Object; e: EventArgs);
  48. begin
  49.  
  50. end;
  51.     
  52. procedure TGlobal.Session_Start(sender: System.Object; e: EventArgs);
  53. begin
  54.  
  55. end;
  56.  
  57. procedure TGlobal.Application_BeginRequest(sender: System.Object; e: EventArgs);
  58. begin
  59.  
  60. end;
  61.  
  62. procedure TGlobal.Application_EndRequest(sender: System.Object; e: EventArgs);
  63. begin
  64.  
  65. end;
  66.  
  67. procedure TGlobal.Application_AuthenticateRequest(sender: System.Object; e: EventArgs);
  68. begin
  69.  
  70. end;
  71.  
  72. procedure TGlobal.Application_Error(sender: System.Object; e: EventArgs);
  73. begin
  74.  
  75. end;
  76.  
  77. procedure TGlobal.Session_End(sender: System.Object; e: EventArgs);
  78. begin
  79.  
  80. end;
  81.  
  82. procedure TGlobal.Application_End(sender: System.Object; e: EventArgs);
  83. begin
  84.  
  85. end;
  86.  
  87. end.
  88.  
  89.